home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / lisp / kcl / kcl.lha / cmpnew / cmpflet.data < prev    next >
Text File  |  1987-01-17  |  3KB  |  124 lines
  1.           
  2. #(
  3. #!
  4. (lisp::in-package 'user::compiler)
  5. lisp::flet
  6. compiler::c1flet
  7. compiler::c1special
  8. compiler::c2flet
  9. compiler::c2
  10. lisp::labels
  11. compiler::c1labels
  12. compiler::c2labels
  13. lisp::macrolet
  14. compiler::c1macrolet
  15. compiler::call-local
  16. compiler::c2call-local
  17. compiler::fun
  18. (lisp::defstruct compiler::fun compiler::name compiler::ref compiler::ref-ccb lisp::cfun compiler::level)
  19. system::defstruct-form
  20. system::is-a-structure
  21. ((compiler::name lisp::nil lisp::nil lisp::nil 0) (compiler::ref lisp::nil lisp::nil lisp::nil 1) (compiler::ref-ccb lisp::nil lisp::nil lisp::nil 2) (lisp::cfun lisp::nil lisp::nil lisp::nil 3) (compiler::level lisp::nil lisp::nil lisp::nil 4))
  22. system::structure-slot-descriptions
  23. system::structure-include
  24. system::structure-print-function
  25. system::structure-type
  26. system::structure-named
  27. compiler::fun-name
  28. (compiler::fun . 0)
  29. system::structure-access
  30. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::fun 0 system::v))
  31. system::setf-lambda
  32. system::setf-update-fn
  33. system::setf-method
  34. system::setf-documentation
  35. compiler::fun-ref
  36. (compiler::fun . 1)
  37. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::fun 1 system::v))
  38. compiler::fun-ref-ccb
  39. (compiler::fun . 2)
  40. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::fun 2 system::v))
  41. compiler::fun-cfun
  42. (compiler::fun . 3)
  43. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::fun 3 system::v))
  44. compiler::fun-level
  45. (compiler::fun . 4)
  46. ((system::x) (system::v) (lisp::list 'system::structure-set system::x ''compiler::fun 4 system::v))
  47. 5
  48. system::structure-offset
  49. (compiler::make-fun)
  50. system::structure-constructors
  51. system::structure-documentation
  52. compiler::*funs*
  53. 1
  54. 0
  55. "The function definition ~s is illegal."
  56. :name
  57. :ref
  58. :ref-ccb
  59. compiler::*vars*
  60. compiler::cb
  61. compiler::*blocks*
  62. compiler::*tags*
  63. compiler::lb
  64. compiler::*next-cfun*
  65. compiler::*vs*
  66. compiler::*clink*
  67. compiler::*ccb-vs*
  68. compiler::*level*
  69. compiler::*local-funs*
  70. compiler::closure
  71. compiler::*closures*
  72. compiler::*compiler-output1*
  73. "The local function definition ~s is illegal."
  74. "The function ~s was already defined."
  75. "The macro definition ~s is illegal."
  76. compiler::*info*
  77. compiler::*do-tail-recursion*
  78. compiler::*tail-recursion-info*
  79. compiler::*exit*
  80. lisp::return
  81. compiler::*value-to-go*
  82. compiler::trash
  83. compiler::*last-label*
  84. compiler::*unwind-exit*
  85. compiler::tail-recursion-mark
  86. "Tail-recursive call of ~s was replaced by iteration."
  87. compiler::*base-used*
  88. compiler::fun-val
  89. compiler::make-fun
  90. compiler::copy-fun
  91. compiler::fun-p
  92. compiler::c1local-fun
  93. compiler::sch-local-fun
  94. compiler::c1local-closure
  95. :cfun
  96. :level
  97. system::copy-structure
  98. compiler::too-few-args
  99. compiler::cmperr
  100. compiler::c1body
  101. compiler::c1add-globals
  102. compiler::check-vdecl
  103. compiler::c1decl-body
  104. compiler::copy-info
  105. compiler::c1lambda-expr
  106. compiler::add-info
  107. compiler::vs-push
  108. compiler::wt-vs
  109. compiler::wt1
  110. compiler::wt-clink
  111. compiler::clink
  112. compiler::ccb-vs-push
  113. compiler::c2expr
  114. compiler::wt-vs*
  115. system::defmacro*
  116. compiler::push-args
  117. compiler::wt-ccb-vs
  118. compiler::tail-recursion-possible
  119. compiler::c2psetq
  120. compiler::unwind-no-exit
  121. compiler::cmpnote
  122. compiler::unwind-exit
  123. )
  124.